Public Class Mer_addProduct
    Inherits System.Web.UI.Page
    Public objvalid As New gaValidation
    Public imgpath, currtURL As String
    Protected WithEvents merchantid As System.Web.UI.WebControls.TextBox
    Protected WithEvents Contact_Email As System.Web.UI.WebControls.TextBox
    Protected WithEvents prodinfo As System.Web.UI.WebControls.TextBox
    Protected WithEvents TxtListing As System.Web.UI.WebControls.TextBox
    Protected WithEvents TxtMQut As System.Web.UI.WebControls.TextBox
    Protected WithEvents unitype As System.Web.UI.WebControls.DropDownList
    Protected WithEvents currc As System.Web.UI.WebControls.DropDownList
    Protected WithEvents Dropdowntype2 As System.Web.UI.WebControls.DropDownList
    Protected WithEvents Dropdownlist1 As System.Web.UI.WebControls.DropDownList
    Protected WithEvents Dropdownlist2 As System.Web.UI.WebControls.DropDownList
    Protected WithEvents Dropdownlist3 As System.Web.UI.WebControls.DropDownList
    Protected WithEvents delivtm As System.Web.UI.WebControls.TextBox
    Protected WithEvents packdt As System.Web.UI.WebControls.TextBox
    Protected WithEvents subm As System.Web.UI.WebControls.Button
    Protected WithEvents upldphoto As System.Web.UI.WebControls.Button
    Protected WithEvents categoryList As System.Web.UI.WebControls.Button
    Protected WithEvents Reset As System.Web.UI.WebControls.Button
#Region " Web Form Designer Generated Code "

    'This call is required by the Web Form Designer.
    <System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()

    End Sub

    'NOTE: The following placeholder declaration is required by the Web Form Designer.
    'Do not delete or move it.
    Private designerPlaceholderDeclaration As System.Object

    Private Sub Page_Init(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Init
        'CODEGEN: This method call is required by the Web Form Designer
        'Do not modify it using the code editor.
        InitializeComponent()
    End Sub

#End Region

    Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        objvalid.getURL(Request.Url.ToString, imgpath, currtURL)
    End Sub

    Private Sub categoryList_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles categoryList.Click
        Dim url As String
        Dim ScriptStr As String
        Dim WindowProp As String
        WindowProp = """height=450px,width=305px,status=yes,toolbar=no,menubar=no,location=no,scrollbars=no,resizable=no"""
        url = """Category.aspx"""
        ScriptStr = "<script language=javascript>window.open(" & url & ",null," & WindowProp & ",true) </script>"
        'Page.RegisterStartupScript("OpenReport", ScriptStr)
    End Sub
End Class
